Top 10k strings from Video Basic - Issue 01 (1985)(Ingelek Jackson)(16k)(es).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Magazines / Sinclair ZX Spectrum - Magazines - [TZX] (TOSEC-v2007-01-01) /

Back to the directory listing

  11 CAR       
  10 "23296"+N,
   7 ;"                              ":
   7  SOFTIDEA (Como) 
   6 SOFTIDEA(COMO)T.031-240.959 
   5 *           *
   4 Y$="PULSA UNA TECLA PARA CONTINUAR ":
   4 X,Y;T$(N):
   4 N$=N$+" ":
   4 "1";"       PARA LA GRABADORA        ":
   4 "1";"                              ":
   4  Tel. 031-240.959  
   4  *         * 
   3 y$=" PULSA UNA TECLA PARA CONTINUAR":
   3 x,y;t$(n):
   3 Via Indipendenza 88
   3 SOFTIDEA COMO T.031-240.959 
   3 PULSA UNA TECLA PARA CONTINUAR Y 
   3 LEE LOS UDG
   3 A$="PON EN MARCHA LA GRABADORA":
   3 ;"ESTA BIEN ESCRITO ? (S/N)"
   3 ;"       PARA LA GRABADORA        ":
   3 "7";"                              ":
   3 "6";"                              ":
   3 "3";"ESCRIBE TU NOMBRE EN EL         TECLADO Y PULSA <ENTER>"
   3 "11";"         ";
   2 p$="VIDEOHARDWARE:               ":
   2 p$="VIDEOBREAK:                  ":
   2 p$="VIDEOBASIC-LA PROGRAMACION:  ":
   2 p$="VIDEOBASIC-EL LENGUAJE:      ":
   2 J$="VAR  ":
   2 HOMBRECILLO
   2 A$="HAS TECLEADO  "+C$(LAST-
   2 A$="HAS TECLEADO  "+B$(N+
   2 A$="HAS TECLEADO  "+B$(LAST-
   2 A$="DEBIAS HABER TECLEADO  "+C$(K):
   2 A$="DEBIAS HABER TECLEADO  "+B$(K):
   2 ;"VIDEOBASIC":
   2 ;"ESCRIBE TU NOMBRE EN  EL        TECLADO Y PULSA  <ENTER>"
   2 ;"   PON EN MARCHA LA GRABADORA   ":
   2 ;"              ":
   2 *          *
   2 "7";"                           ":
   2 "5";"PULSA";
   2 "4";"ESTA BIEN ESCRITO ? (S/N)"
   2 "245"+"    ":
   2 "2"*N);R$(N):
   2 "12";"ERROR":
   2  SOFTIDEA  (Como) 
   2     SOFTIDEA     
   2        PARA LA GRABADORA        
   2            "
   2                
   1 y(n)=y(n+1
   1 y$="PULSA UNA TECLA PARA CONTINUAR ":
   1 y$=" PULSA UNA TECLA PARA CONTINUAR ":
   1 y$="  PULSA UNA TECLA PARA CONTINUAR":
   1 t$="Y AHORA, PARA VER SI HE SIDOCLARO, TE PROPONGO UN TEST: HAZ LO QUE TE  PIDA PULSANDOLAS SIGUIENTES  TECLAS:":
   1 t$="SI EL VALOR A ASIGNAR ES  DETIPO NUMERICO,  LA  VARIABLEDEBE SER NUMERICA, SI EL VA-LOR ES DE TIPO TEXTO, DEBERASER  UNA  VARIABLE  TEXTO  OCADENA, IDENTIFICADA POR  ELSIMBOLO '$'.":
   1 t$="PUESTO QUE ASIGNA A  LA  VA-RIABLE F$ LA SUMA DE LOS VA-LORES DE TEXTO DE LAS VARIA-BLES T$+D$+B$  EN  EL  ORDENINDICADO, F$ CONTIENE  AHORAEL VALOR DE TEXTO 'TIEMPO DEBASIC'.":
   1 t$="OK "+Q$+", EMPEZAMOS":
   1 t$="LET A=237":
   1 t$="LA SENTENCIA LET ASIGNA A LAVARIABLE QUE  LA  SIGUE,  ELVALOR INDICADO  DESPUES  DELSIMBOLO  =.   ES  EL  METODOMAS SIMPLE  PARA  INTRODUCIRUN VALOR EN LA MEMORIA DE TUSPECTRUM.":
   1 t$="EL NOMBRE  DE  LAS VARIABLESIDENTIFICA  UNA  DETERMINADAZONA DE LA  MEMORIA,  EN  LAQUE SE CONTIENE EL VALOR QUEUNA VARIABLE POSEE  EN  CADAMOMENTO.                    PARA  SABER  DE   CUALES   YCUANTOS CARACTERES PUEDE ES-TAR  FORMADA  UNA  VARIABLE,LEE ANTES EL  VIDEO-LIBRO  YCONTINUA LUEGO CON EL VIDEO-BASIC PARA EXAMINAR LA  SEN-TENCIA LET."
   1 t$="CON LAS SENTENCIAS DEL BASICQUE PERMITEN INTRODUCIR  DA-TOS  EN  LA  MEMORIA  DE  TUSPECTRUM.  ESTAS   SON   MUYPOTENTES Y SE  UTILIZAN  CONFRECUENCIA EN CADA PROGRAMA.":
   1 t$="ASIGNA A LA VARIABLE  B$  ELVALOR DE TEXTO 'BASIC'.":
   1 t$="ASIGNA A LA  VARIABLE  Z  ELVALOR OBTENIDO EN EL CALCULODE LA EXPRESION A LA DERECHADEL SIMBOLO =, Y  SE  LEE:  Z RECIBE EL VALOR DE LA  EX-PRESION (3.14*15/4)^2.":
   1 t$="ASIGNA A LA  VARIABLE  C  ELVALOR DE LA VARIABLE A SUMA-DO AL DE LA VARIABLE Z.     C RECIBE EL VALOR DE A +  ELVALOR DE Z.":
   1 t$="ASIGNA A LA  VARIABLE  A  ELVALOR 237 Y SE LEE:         A RECIBE EL VALOR 237.":
   1 t$="ASIGNA  A  LA  VARIABLE   DECADENA T$ EL VALOR DE  TEXTO'TIEMPO'.  BAJO LA  ETIQUETAT$ EL ORDENADOR MEMORIZA  LAPALABRA 'TIEMPO'.  ES IMPOR-TANTE NOTAR QUE EL TEXTO DE-BE PONERSE ENTRE COMILLAS.":
   1 t$="ASIGNA  A  LA  VARIABLE   DECADENA D$ EL VALOR DE  TEXTO' DE ' ('DE' PRECEDIDO Y SE-GUIDO POR UN ESPACIO).":
   1 t$="ACTUAN SOBRE LAS  VARIABLES.LAS VARIABLES (NOMBRES  CON-VENCIONALES FORMADOS POR UNACIERTA SECUENCIA DE CARACTE-RES) TOMAN EL VALOR, QUE TU,COMO PROGRAMADOR  O  USUARIODEL PROGRAMA,  DESEES  ATRI-BUIRLES."
   1 t$=" ASIGNA UN VALOR NUMERICO ":
   1 t$="  ASIGNA UN VALOR DE TEXTO  ":
   1 pon en marcha la grabadora";
   1 p;"            ":
   1 p;"               ":
   1 p$="todos los perifericos       ":
   1 p$="los temas de la leccion   ":
   1 p$="juego de adivinanzas sobre ":
   1 p$="en el proximo numero...    ":
   1 p$="el teclado del Spectrum    ":
   1 p$="el primer programa          ":
   1 p$="el modo inmediato           ":
   1 p$="el esquema de un ordenador  ":
   1 p$="del   spectrum             ":
   1 p$="concierto de ordenador      ":
   1 p$="caleidoscopio               ":
   1 p$="VIDEOTEST:                  ":
   1 p$="VIDEONEXT:                  ":
   1 p$="VIDEONEXT":
   1 p$="VIDEOLIST":
   1 p$="VIDEOJUEGO:                 ":
   1 p$="VIDEOJUEGO:                  ":
   1 p$="Spry Wars                   ":
   1 p$="LET  -  PRINT               ":
   1 p$="Key-basket                 ":
   1 p$="INPUT - LIST - RUN          ":
   1 n;"        ":
   1 n;"         ":
   1 n,ye;"""":
   1 level=level-1
   1 level=level+1
   1 en el proximo numero...    Ai
   1 e$="ERROR!":
   1 e$="                              "
   1 curso de hardware "
   1 cc-aa,dd-bb,ee:
   1 aa,bb,cc,dd,ee:
   1 a;"               ":
   1 a$=A$+"            OTRO DISPOSITIVO DE  INPUT  ESLA  GRABADORA,  CUANDO  VUELCAINFORMACIONES DE LA CINTA A LAMEMORIA.":
   1 a$="VIDEOBASIC.":
   1 a$="Tu objetivo es aprender el BASICbien y pronto.":
   1 a$="TAMBIEN  LA  IMPRESORA,  Y  LAGRABADORA CUANDO RECIBE Y  AL-MACENA EN CINTA LOS DATOS  DELORDENADOR, SON PERIFERICOS  DEOUPUT.":
   1 a$="PERO PARA SER UTIL,TU SPECTRUMDEBE TRANSMITIR LOS RESULTADOSDE LAS ELABORACIONES DEL  MODOEN QUE PUEDAN  SERVIRTE.  ESTATAREA SE LE ASIGNA A LOS  DIS-POSITIVOS DE OUTPUT.":
   1 a$="Mi tarea es conseguir  que  estoocurra de la forma mas  sencillay divertida posible.":
   1 a$="Lee atentamente en  el  videoli-bro, el texto referente al  temadel que te ocupes, y  haz  todoslos ejercicios que yo,  tu  fielSpectrum, te proponga."
   1 a$="LA MEMORIA ES LA PARTE  DE  TUSPECTRUM QUE ACOGE Y  CONSERVALAS INFORMACIONES."
   1 a$="LA CPU INTERCAMBIA INFORMACIO-NES CON LA MEMORIA DEL ORDENA-DOR, TOMA DATOS DE  ELLA,  LOSELABORA Y LOS VUELVE A COLOCAREN LA MEMORIA."
   1 a$="Hasta pronto,":
   1 a$="HAY DOS TIPOS DE MEMORIA:                                   *ROM (READ ONLY MEMORY) O  ME-MORIA DE SOLO LECTURA:        LA CPU SOLO PUEDE  LEER  DATOSEN ELLA. TIENE LA  VENTAJA  DENO BORRARSE CUANDO  APAGAS  TUSPECTRUM.":
   1 a$="HABLANDO EN BASIC, PUEDES CONSE-GUIR QUE TU  ORDENADOR  HAGA  LOQUE DESEES.  PERO  ES  NECESARIOQUE  LAS  INSTRUCCIONES  QUE  LEPROPORCIONES A TRAVES  DEL   TE-CLADO SEAN  PRECISAS  Y  FORMAL-MENTE CORRECTAS.":
   1 a$="EL TELEVISOR Y EL MONITOR  SONDISPOSITIVOS DE OUTPUT:       A TRAVES DE ELLOS EL ORDENADORTE MUESTRA  LAS  INFORMACIONESELABORADAS.":
   1 a$="EL TECLADO ES  EL  DISPOSITIVODE INPUT MAS IMPORTANTE:      ATRAVES DE EL  PUEDES  HACERLELLEGAR A LA CPU  LAS  INFORMA-CIONES A ELABORAR."
   1 a$="EL CORAZON DEL SPECTRUM SE EN-CUENTRA EN EL INTERIOR  DE  SUCAJA, EN UNA  TARJETA  QUE  SEENTREVEE DESDE LAS   ABERTURASPOSTERIORES. SE LLAMA CPU, QUESIGNIFICA  UNIDAD  CENTRAL  DEPROCESO":
   1 a$="AQUI SE PROCESAN, ES DECIR, SEBUSCAN, SE RECONOCEN Y  EJECU-TAN LAS INSTRUCCIONES DEL PRO-GRAMA QUE SE ENCUENTRA  EN  LAMEMORIA.":
   1 a$="> > >":
   1 a$="*RAM  (RANDOM ACCESS MEMORY) OMEMORIA DE LECTURA/ESCRITURA: LA CPU PUEDE TOMAR O  INSERTARDATOS EN ELLA, PERO SE PIERDENCUANDO SE APAGA EL  ORDENADOR.PARA INTRODUCIR  LAS  INFORMA-CIONES A ELABORAR ES NECESARIOUN DISPOSITIVO DE INPUT.":
   1 a$=" QUIERES VOLVER  A  VER  ESTA  LECCION?   [S/N]":
   1 a$=" QUIERES  CARGAR  EL  PROGRAMA         SIGUIENTE? (S/N)":
   1 a$="  OK "+n$+",":
   1 a$="  COMENZAMOS, "+n$+" !":
   1 a$="  Buen trabajo,":
   1 a$="                     Videobasic."
   1 Z$="$    ":
   1 Y,N;A$(N-2
   1 Y,N;A$(N-1
   1 Via Indipendenza, 88
   1 VIDEOTEST 
   1 VIDEONEXT 
   1 VIDEOLIST 8
   1 VIDEOBREAK
   1 VIDEOBASIC N.1
   1 VIDEOBASIC
   1 VARIABLES ,
   1 UAR PULSA UNA TECLA PARA CONTINU
   1 TIPO DE INFORMACION  UTILIZADOAL ESCRIBIR UNA LETRA             TEXTO       
   1 TIPO  DE  INFORMACION  QUE  SEUTILIZA PARA LOS CALCULOS         NUMERICA    
   1 TEST01    M
   1 TERMINO INGLES  QUE  SIGNIFICA'PROGRAMAS' EN GENERAL            SOFTWARE    
   1 TECSCREEN 
   1 TECLADO   
   1 TECLA CON QUE SE FINALIZA  UNAINSTRUCCION PARA INTRODUCIRLA     ENTER       
   1 T$="VEAMOS AHORA, "+N$+",":
   1 T$="VEAMOS AHORA  ALGUNOS  EJEM-PLOS PARA ACLARAR ESTOS PRI-MEROS CONCEPTOS."
   1 T$="UNA  COMA  <,>  INMEDIATAMENTEDESPUES DE  <PRINT>,  DESPLAZALA POSICION DE IMPRESION A  LADECIMOSEXTA COLUMNA.":
   1 T$="TECLADO Y TU SPECTRUM LAS EJE-CUTA DESPUES DE QUE HAYAS PUL-SADO LA TECLA 'ENTER'.":
   1 T$="TE PROPONGO UN TEST.  HAZ  LO QUE TE  PIDA   PULSANDO   LAS TECLAS SIGUIENTES:":
   1 T$="TE PROPONGO  ALGUNAS  INSTRUC-CIONES EN CASTELLANO:  TU  LASTRADUCIRAS AL BASIC.":
   1 T$="SE CON EL ORDENADOR."
   1 T$="PUEDES TRANSMITIR TAMBIEN  MASDE  UNA  INSTRUCCION,  CON  LACONDICION DE SEPARARLAS  ENTREELLAS CON ':' (DOS PUNTOS).":
   1 T$="PROGRAMAR SIGNIFICA PROPORCIO-NARLE AL ORDENADOR  TODAS  LASINSTRUCCIONES NECESARIAS  PARALA  CONSECUCION  DEL  OBJETIVOQUE QUIERAS ALCANZAR.":
   1 T$="PRINT A$;B$":
   1 T$="PRINT A":
   1 T$="PRINT 10":
   1 T$="PRINT ,A$":
   1 T$="PRINT ,""BASIC""":
   1 T$="POR AHORA, UNICAMENTE NOS OCU-PAREMOS DEL MODO INMEDIATO.":
   1 T$="PARA IDENTIFICAR UNA CADENA  YDISTINGUIRLA DEL NOMBRE DE UNAVARIABLE, SE LE ENCIERRA ENTRECOMILLAS.":
   1 T$="PARA  PROGRAMAR  ES  NECESARIO":
   1 T$="MODO PROGRAMA":
   1 T$="MODO INMEDIATO":
   1 T$="LET Z=(3.14*15/4)^2":
   1 T$="LET T$=""TIEMPO""":
   1 T$="LET D$="" DE "" ":
   1 T$="LET C=A+Z":
   1 T$="LET B$=""BASIC""":
   1 T$="LA SENTENCIA <PRINT> PRECEDE ALA CONSTANTE O  LAS  VARIABLESQUE DEBEN SER IMPRESAS.":
   1 T$="LA PROGRAMACION":
   1 T$="LA CADENA (TERMINO USADO  PARADEFINIR UNA INFORMACION DE TI-PO TEXTO) CONSISTE EN UNA  SE-RIE DE SIMBOLOS O  CARACTERES,QUE SE CONSIDERAN COMO UNA EN-TIDAD UNICA.":
   1 T$="IMPRIME UN VALOR NUMERICO CON-TENIDO EN UNA VARIABLE.":
   1 T$="IMPRIME UN TEXTO CONTENIDO  ENUNA VARIABLE, EN LA COLUMNA 16":
   1 T$="IMPRIME LOS TEXTOS  CONTENIDOSEN LAS VARIABLES A$ Y B$,  UNOA CONTINUACION DEL OTRO, EN SUORDEN, A PARTIR DE LA  COLUMNACERO. EL <;> SIRVE  SOLO  COMOSEPARADOR  PARA  RESPETAR   LACORRECTA SINTAXIS DE  LA  SEN-TENCIA.":
   1 T$="IMPRIME EN LA COLUMNA CERO  ELVALOR CONTENIDO EN LA VARIABLEA. LA  VARIABLE  DEBERA  HABERSIDO  ANTERIORMENTE   DEFINIDACON: LET A=VALOR NUMERICO,  DEOTRO MODO  SE  INCURRE  EN  ELMENSAJE DE ERROR <Variable notfound>, ES DECIR <Variable  noencontrada>, Y EL PROGRAMA  NOPODRA FUNCIONAR."
   1 T$="IMPRIME EN LA  DECIMOSEXTA CO-LUMNA EL TEXTO CONTENIDO EN LAVARIABLE A$ QUE,  COMO  EN  ELCASO ANTERIOR DEBERA  SER  DE-FINIDA CON: LET A$=""TEXTO"", DEOTRO MODO SE OBTIENE EL MENSA-JE  DE  ERROR  <Variable   notfound>.":
   1 T$="IMPRIME EL TEXTO <BASIC> EN LADECIMOSEXTA COLUMNA.":
   1 T$="IMPRIME EL TEXTO ""RUN""":
   1 T$="IMPRIME EL NUMERO 10 EN EL EX-TREMO IZQUIERDO DE  LA  PANTA-LLA, ES DECIR, A PARTIR DE  LACOLUMNA CERO.":
   1 T$="HEMOS LLEGADO A UNA  PAUSA RE-LAJADA. TE MOSTRARE CONSECUTI-VAMENTE ALGUNOS DIBUJOS GEOME-TRICOS.":
   1 T$="HEMOS LLEGADO A LA PARTE  CEN-TRAL DEL TEMA QUE NOS OCUPA:":
   1 T$="HAY DOS MANERAS POSIBLES  PARADECIRLE   QUE   HACER   A   TUSPECTRUM :":
   1 T$="FINALMENTE, "+N$+",":
   1 T$="ESCRIBE EN LA MISMA LINEA  LASSIGUIENTES INSTRUCCIONES:     ASIGNA A X EL VALOR 132 E  IM-PRIME LA VARIABLE X.":
   1 T$="ERROR":
   1 T$="EN EL MODO PROGRAMA,  EN  CAM-BIO, TUS INSTRUCCIONES SE ANO-TAN EN ALGUNA PARTE DE LA  ME-MORIA Y SE EJECUTAN  SUCESIVA-MENTE Y UNICAMENTE A CONTINUA-CION DE TU ORDEN ESPECIFICA.":
   1 T$="EL PUNTO Y COMA <;> NO  CAMBIALA POSICION DE IMPRESION, PEROSIRVE PARA SEPARAR LAS  INFOR-MACIONES A VISUALIZAR.":
   1 T$="EL ORDENADOR RECONOCE EL  MODOPROGRAMA PORQUE LA  INSTRUCCI-ON, O GRUPO  DE  INSTRUCCIONESESTAN PRECEDIDAS POR UN  NUME-RO. ":
   1 T$="EL MODO INMEDIATO  ES  EL  QUEHAS EMPLEADO  HASTA  AHORA  ENLOS EJERCICIOS: TU  INTRODUCESLAS INSTRUCCIONES A TRAVES DEL":
   1 T$="EL BASIC ES LA  LENGUA  EN  LAQUE PUEDES HABLAR CON EL ORDE-NADOR Y TRANSMITIRLE LAS  SEN-TENCIAS A EJECUTAR.":
   1 T$="EL APOSTROFE <'>  DESPLAZA  ENCAMBIO LA POSICION DE IMPRESI-ON A LA LINEA SIGUIENTE.":
   1 T$="CONOCER:":
   1 T$="CON UNA SOLA SENTENCIA <PRINT>PUEDES IMPRIMIR VARIAS  INFOR-MACIONES, CON LA UNICA  CONDI-CION DE  QUE  ESTEN  SEPARADASENTRE ELLAS  CON  <;>,  <,>  O<'>, SEGUN LAS NECESIDADES  DECOLOCACION.":
   1 T$="BIEN !":
   1 T$="ASIGNA A LA VARIABLE N$ EL VA-LOR DE TEXTO ""VIDEOBASIC""":
   1 T$="ASIGNA A LA VARIABLE  NUMERICAZ EL VALOR 27":
   1 T$="ALGUNOS EJEMPLOS DEL EMPLEO DELA SENTENCIA <PRINT>.":
   1 T$="AHORA "+N$+",":
   1 T$=" LAS INFORMACIONES SOBRE  LAS  QUE TU SPECTRUM OPERA PUEDEN  SER UNICAMENTE DE DOS TIPOS:  NUMEROS O TEXTOS (CADENAS).":
   1 T$=" FINALMENTE "+N$+",":
   1 T$=" EXAMINEMOS AHORA UNA INSTRUC- CION BASIC MUY IMPORTANTE.":
   1 T$=" BIEN "+N$+",":
   1 T$=" AHORA "+N$+",":
   1 T$=" <PRINT> ES LA SENTENCIA  QUE  TE PERMITE IMPRIMIRLAS EN LA  PANTALLA.":
   1 T$=" -EL PROCEDIMIENTO A SEGUIR":
   1 T$=" -EL OBJETIVO A ALCANZAR":
   1 T$=" -EL MODO PROGRAMA":
   1 T$=" -EL MODO INMEDIATO":
   1 T$=" -EL LENGUAJE PARA COMUNICAR-":
   1 T$="         F$=T$+D$+B$        SABRIAS DECIR  QUE  CONTIENEF$ ?. ESCRIBE LA RESPUESTA YPULSA <ENTER>.":
   1 SU NOMBRE REPRESENTA UN  VALORALMACENADO EN LA MEMORIA          VARIABLE    
   1 SOFTIDEA Como 
   1 SIGLAS INGLESAS DE 'MEMORIA DELECTURA/ESCRITURA'                RAM         
   1 SIGLAS  INGLESAS  DE   'UNIDADCENTRAL DE PROCESO'               CPU         
   1 SENTENCIA BASIC PARA  IMPRIMIRINFORMACION EN LA PANTALLA        PRINT       
   1 SENTENCIA BASIC  PARA  ASIGNARVALOR A UNA VARIABLE              LET         
   1 RUTINA PARA MAQUINA DE ESCRIBIR
   1 RUTINA MAQUINA DE ESCRIBIR
   1 READ    BIN     L PRINT DATA    TAN     SGN     ABS     SQR     CODE    VAL     LEN     USR     PI      INKEY $ PEEK    TAB     SIN     INT     RESTORE RND     CHR $   L LIST  COS     EXP     STR $   LN      ~       BRIGHT  PAPER   \       ATN     {       }       CIRCLE  IN      VAL $   SCREEN $ATTR    INVERSE OVER    OUT     
   1 R$="TIEMPO DE BASIC"
   1 R$="P,V$":
   1 PULSA UNA TECLA PARA CONTINUAR PTN
   1 PROGRAMAC.l
   1 PRINT     D
   1 PON EN MARCHA LA GRABADORA
   1 PETICION DEL NOMBRE
   1 PARA LA SALIDA DE DATOS SE EM-PLEAN DISPOSITIVOS DE...          OUTPUT      
   1 PARA INTRODUCIR DATOS SE  UTI-LIZAN DISPOSITIVOS DE ...         INPUT       
   1 P$="      en el numero 2        ":
   1 ONTINUAR PULSA UNA TECLA PARA CO
   1 NEW      BORDER   CONTINUE DIM      REM      FOR      GO TO    GO SUB   INPUT    LOAD     LIST     LET      PAUSE    NEXT     POKE     PRINT    PLOT     RUN      SAVE     RANDOMIZEIF       CLS      DRAW     CLEAR    RETURN   COPY     STOP     *        ?        STEP     >=       TO       THEN     ^        AT       -        +        =        .        ,        ;        "        <=       <        NOT      >        OR       /        <>       `        AND      :        
   1 N$=""VIDEOBASIC""":
   1 MENSAJES ENTRANTES
   1 MENSAJE ROTATORIO
   1 M-15333-1985
   1 M$=M$+C$(K,N):
   1 LETREROS ENTRANTES
   1 LETRERO ROTATORIO
   1 LET       
   1 LAST+"   ":
   1 LAS INSTRUCCIONES SE  EJECUTANINMEDIATAMENTE EN EL MODO...      INMEDIATO   
   1 LA PARTE FISICA DEL  ORDENADORSE DENOMINA...                    HARDWARE    
   1 L$=",    ":
   1 KEY-BASKET
   1 KEY BASKET
   1 K$=K$+M$(N)
   1 INT.TEC.  `
   1 INGELEK JAKSON
   1 INDICA LA POSICION DE IMPRESI-ON DE UN CARACTER EN PANTALLA     CURSOR      
   1 HEMOS LLEGADO A UNA  PAUSA RE-LAJADA. TE MOSTRARE CONSECUTI-VAMENTE ALGUNOS DIBUJOS GEOME-TRICOS.
   1 HARDWARE  
   1 EMPECEMOS CON UNA  OJEADA  A  LAPARTE FISICA DE TU SPECTRUM,  LAQUE EN  LA   JERGA,   LLAMAREMOSHARDWARE.N
   1 D$="1233":
   1 CIUDAD    
   1 CARACTER QUE DISTINGUE LAS VA-RIABLES DE CADENA (TEXTO)         $           
   1 C$(K,N)=" "
   1 B$="------------"
   1 ASIGNA A LA  VARIABLE  A  ELVALOR 237 Y SE LEE:         A RECIBE EL VALOR 237.
   1 A$="VIDEOTEST ":
   1 A$="VIDEOBASIC":
   1 A$="TECLEA LA  LETRA  REQUERIDA, USA<CAPS SHIFT> PARA LAS MAYUSCULAS":
   1 A$="TECLEA CAPS SHIFT Y SIMBOL SHIFTPARA CAMBIAR EL MODO CURSOR":
   1 A$="TECLEA AHORA LOS COMANDOS Y  LOSSIMBOLOS QUE ESTAN ESCRITOS  SO-BRE LAS TECLAS.":
   1 A$="TECLEA  "+C$(K):
   1 A$="TECLEA  "+B$(K):
   1 A$="TECLEA  "+
   1 A$="TE PERMITIRA OBTENER LOS  SIM-BOLOS Y LOS COMANDOS EN VERDE,ENCIMA DE LAS TECLAS, MIENTRASQUE PARA OBTENER LOS  SIMBOLOSY LOS COMANDOS EN ROJO, MARCA-DOS DEBAJO DE LAS TECLAS,  DE-BERAS TAMBIEN  PULSAR  <SYMBOLSHIFT>.":
   1 A$="PULSA <SYMBOL SHIFT> PARA  OB-TENER LOS SIMBOLOS Y  COMANDOSMARCADOS EN ROJO.":
   1 A$="PULSA <CAPS SHIFT> PARA  OBTE-NER LAS MAYUSCULAS.":
   1 A$="POR LO TANTO DEBERAS CONOCER MUYBIEN EL  TECLADO  DEL  SPECTRUM;ASI EVITARAS LOS  ERRORES  VANA-LES DE TECLEADO,  CAUSA  DE  LASINCOMPRENSIONES ENTRE EL  INTER-PRETE BASIC Y TU."
   1 A$="PARA PASAR DE UNA FASE A  OTRAY CARGAR  EL  PROGRAMA,  BASTACON PULSAR <SPACE>.":
   1 A$="LEE CON ATENCION LAS  INSTRUC-CIONES QUE SIGUEN.":
   1 A$="LA SEGUNDA FASE TE INDICA COMOTECLEAR LOS COMANDOS Y  SIMBO-LOS MARCADOS EN LAS TECLAS.":
   1 A$="LA  PRIMERA  FASE  SIRVE  PARAAPRENDER A USAR LAS LETRAS IN-DICADAS EN  BLANCO  SOBRE  LASTECLAS, COMO EN UNA MAQUINA DEESCRIBIR.":
   1 A$="HAS TECLEADO  "+C$(N+
   1 A$="HAS TECLEADO  "+C$(N):
   1 A$="HAS TECLEADO  "+
   1 A$="EN LA TERCERA FASE  DEBES  SI-TUARTE EN MODO EXTENDIDO, PUL-SANDO  SIMULTANEAMENTE   <CAPSSHIFT> Y <SYMBOL SHIFT>.":
   1 A$="EMPECEMOS CON UNA  OJEADA  A  LAPARTE FISICA DE TU SPECTRUM,  LAQUE EN  LA   JERGA,   LLAMAREMOSHARDWARE."
   1 A$="EL PROGRAMA ESTA  DIVIDIDO  ENTRES FASES DISTINTAS.":
   1 A$="EL BASIC ES EL  LENGUAJE  INTER-PRETE QUE RESIDE EN UNA  MEMORIAESPECIAL DE TU SPECTRUM, LLAMADA'ROM'.":
   1 A$="EL  PROGRAMA  SIGUIENTE  TIENEPOR  OBJETO  ACOSTUMBRARTE  ALTECLADO DE TU SPECTRUM.":
   1 A$="DEBIAS HABER TECLEADO  "+
   1 A$="BIEN "+N$+",":
   1 A$="APARECERA UNA <E>  PARA  INDI-CARTE QUE TE ENCUENTRAS EN  ELMODO EXTENDIDO.":
   1 A$=" LA  PROGRAMACION "::
   1 A$=" CARGO EL PROGRAMA <TECLADO>  ":
   1 A$="  PON EN MARCHA LA GRABADORA  ":
   1 A$="   NO HAS CAMBIADO EL CURSOR    ":
   1 A$="    DESEAS VOLVER A VER LAS       INSTRUCCIONES?    (S/N)   ":
   1 A$="    Consulta el VIDEOLIBRO":
   1 A TECLA PARA CONTINUAR PULSA UNAT
   1 ;n$;" ?(s/n)"
   1 ;"y quita la alimentacion a tu";
   1 ;"puntuacion:";
   1 ;"ordenador..";gc
   1 ;"muy bien, enhorabuena!"
   1 ;"jugador....";gp;
   1 ;"Y PULSA <ENTER>":
   1 ;"VIDEOBREAK":
   1 ;"Usa las teclas '5'y'8' para des-plazar el cursor, pulsa  
   1 ;"TU PUNTUACION ES ";s;" SOBRE 30."
   1 ;"SPECTRUM.     Hasta pronto,";
   1 ;"PULSA ? <S.SHIFT C> PARA AYUDA":
   1 ;"PREGUNTA N. ";w
   1 ;"PARA MEJORAR VUELVE A LEER";
   1 ;"ORDENADOR = ";pc;"  ":
   1 ;"NO TE PUEDO AYUDAR":
   1 ;"MUY BIEN ";n$;
   1 ;"La respuesta correcta es:";
   1 ;"LA RESPUESTA ES MUY CORTA";
   1 ;"JUGADOR = ";pp;"  ":
   1 ;"INTENTALO DE NUEVO"
   1 ;"HE AQUI UNA SUGERENCIA:"
   1 ;"Guarda la casete en su  caja ";
   1 ;"FASE 3":
   1 ;"FASE 2":
   1 ;"FASE 1":
   1 ;"ESCRIBE TU NOMBRE EN EL         TECLADO Y PULSA <ENTER>"   
   1 ;"ESCRIBE TU NOMBRE EN EL         TECLADO Y PULSA <ENTER>"
   1 ;"ESCRIBE TU NOMBRE  ";
   1 ;"ES EXACTO."
   1 ;"EN EL TECLADO  ";
   1 ;"EL TECLADO DEL SPECTRUM"
   1 ;"""";i$;""" esta equivocado."
   1 ;" pulsa una tecla "
   1 ;" Repito";
   1 ;" Esta bien escrito";
   1 ;" ESTOY CARGANDO VIDEOTEST":
   1 ;" ESTOY CARGANDO VIDEOTEST ":
   1 ;" ESCOJE EL NIVEL DE DIFICULTAD  ";
   1 ;" Cargo <LET>"  
   1 ;"  PARA LA GRABADORA  "   
   1 ;"  ORDENADOR = 00  JUGADOR = 00  ";
   1 ;"   PULSA:";
   1 ;"       PARA LA GRABADORA        "
   1 ;"        PARA LA GRABADORA       "
   1 ;"           VIDEOBASIC                      presenta.."
   1 ;"           "
   1 ;"               ";
   1 ;"                ";
   1 ;"                  "
   1 ;"                     ";
   1 ;"                      ":
   1 ;"                              "
   1 ;"                                ":
   1 ;  "   VIDEOLIBRO: ""las variables""":
   1 ;                  "
   1 24,6666666666666666666666666666666666666666666666666666666666666666666666666666666666666666666666660000000000000000000000000000000000000000000000000000000000000000l
   1 22100 Como T.240959
   1 22100 COMO T.240959
   1 0123456789
   1 00000000000000000000000000000000000000000000000000000000000000000000000000111111111111102110000000000000021111111111111221100000000000000222222222222222211000000000000002222222222222222110000000000000000000000000000000000000666666666660000000006600000000006666666666666666666666666666666666666666666666666666666666666666:????????????????????????????????????????????????????????????????::::???????????????????????????????????????????????????????????::::????????????????????????????88??????????????????????????????88?????????????????????:?????88?88???????????88?????::::?????88?88???????88????????89:::?????88?8888888888888888889999999???????888888888888888888999999:8888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888
   1 ---KEY-BASKET---                                                                         
   1 ------------
   1 ,N;A$(N-10
   1 **AYUDA II INTENTO**
   1 ***trafico***
   1 ***respuesta flash***
   1 ***puntuacion***
   1 ***premi tasto***
   1 ***comentario final***
   1 ***bloque principal***
   1 ***INPUT controlado***
   1 ***FONDO***
   1 ***CLS BAJO***
   1 * si interrumpes este programa, para continuar, no debes hacer RUN, sino GOTO 30 *
   1 *           *Via Indipendenza 88*           * Tel. 031-240.959  *
   1 ));q$(q,65
   1 ''''''      "        
   1 ''''''                     "
   1 '''         "            
   1 ''"OK "+N$+",":
   1 '"SIGUE CON ATENCION ESTAS  BREVESNOTAS SOBRE EL  HARDWARE  DE  UNORDENADOR."
   1 "RESPUESTA = ";
   1 "F$ = ";R$:
   1 "7";;"  PULSA LA TECLA <SPACE> PARA           CAMBIAR DE FASE         "
   1 "7";"INPUT"
   1 "6";"es inexacto!!":
   1 "6";"caracteres  deseados":
   1 "6";"PULSA";
   1 "6";"LA TRADUCCION ES :";
   1 "6";"<V>  para variable  ";
   1 "6";"<,> y <$>  para los ";
   1 "6";"                                ":
   1 "5";"<P>  para PRINT     ";
   1 "5",n;"LET":
   1 "5",n;"=":
   1 "4";"PULSA:";
   1 "4";"OUTPUT":
   1 "4";"OUTPUT"
   1 "4";"ESTA BIEN ESCRITO ?(S/N)";
   1 "4";"ESTA BIEN ESCRITO  ? (S/N)"
   1 "4";"        ":
   1 "4",N;A$(N-
   1 "4")=Z$(N):
   1 "3";;"C.P.U.":
   1 "3";"caracteres correspondientes.";
   1 "3";"PULSA";
   1 "3";"No olvides  SYMBOL SHIFT    "
   1 "3";"C.P.U."
   1 "3";"<V> para variable           "
   1 "3";"<T> para texto              "
   1 "3";"<L> para la sentencia let   ";
   1 "3";"<E> para express.numerica   ";
   1 "3";"<=> <""> y <$> para i        ";
   1 "3";"        ":
   1 "3","7","0","5","5","5","5","15","128","192","0","192","192","192","192","240","8","10","8","10","8","8","13","14","16","16","80","80","80","80","48","176","12","4","5","5","5","5","15","15","96","32","32","32","32","32","224","224"
   1 "25";"FASE 3":
   1 "25";"FASE 2":
   1 "25";"FASE 1":
   1 "20",n;e$(n-
   1 "2")=L$(N):
   1 "2")=J$(N):
   1 "2");"BIEN "+N$+"!":
   1 "19";"TEXTO":
   1 "19";"EXP.":
   1 "19";"    "
   1 "19";"     "
   1 "13";"VAR":
   1 "13";"PRINT":
   1 "13";"   "
   1 "11";"ERROR !":
   1 "11";"EQUIVOCADO :":
   1 "11";" MEMORIA ";
   1 "11";"         "
   1 "1";"PON EN MARCHA LA GRABADORA":
   1 "1";"LET":
   1 "1";"INPUT":
   1 "1";"FLUJO DE LAS INFORMACIONES":
   1 "1";"EXACTO":
   1 "1";"ESQUEMA DEL SPECTRUM "
   1 "1";"  PON EN MARCHA LA GRABADORA !  "
   1 "1";"   PON EN MARCHA LA GRABADORA   ":
   1 "1";"       ":
   1 "1";"                      ":
   1 "1"-(M$(C+
   1 "1",ye;" "
   1 "   PULSA 
   1 "   Ganara la manga el  primero   que totalice 5  canastas.  El   que gane  5  mangas  sera  el   CAMPEON" 
   1  para terminar"
   1  para sentencia PRINT ";
   1  para repaso";
   1  para ejercicios"
   1  Tel. 031-240.959 
   1  Tel.  031-240.959 
   1  SOFTIDEA (Como) **     
   1  SOFTIDEA (Como)
   1  REPITO DESDE EL PRINCIPIO";
   1  QUIERES  CARGAR  EL  PROGRAMA         SIGUIENTE? (S/N)
   1  PARA LAS INSTRUCCIONES                                        
   1  PARA JUGAR  ";
   1  PARA JUGAR                                                    
   1  PARA CARGAR EL                  PROXIMO PROGRAMA"
   1  EJERCICIOS";
   1  DESDE LOS EJECICIOS";
   1  CARGO VIDEOTEST";
   1  CARGO EL VIDEOJUEGO";
   1  CARGAR PROGRAMA";
   1  CARGA VIDEOBREAK";
   1   pulsa:                                                               
   1   Tel. 031-240.959  
   1   PULSA UNA TECLA PARA CONTINUARY 
   1    Para cargar  VIDEOHARDWARE,     pon en marcha la  grabadora  
   1        ASN     VERIFY  |       MERGE   ]       FLASH   ACS     INK     [       BEEP    FORMAT  DEF FN  FN      LINE    OPEN $  CLOSE $ MOVE    ERASE   POINT   CAT     
   1         ---KEY-BASKET---         
   1          has ganado tu!         
   1          PULSA UNA TECLA        
   1          ":
   1           he ganado yo!         
   1           VIDEOHARDWARE                 
   1           * 
   1           "
   1            *
   1                               B
   1                                             o bien                                                 desafio hasta la ultima         canasta   "''"    contra   tu    SPECTRUM"
   1                                              El juego consiste en ences-   tar antes que el  ordenador.      Para conseguirlo  es  nece-   sario pulsar la tecla corres-   pondiente a la letra  que  se   ilumine en la pantalla, en el   menor tiempo posible, es  de-   cir, antes que  el  ordenador   consiga jugar."
   1                                 
   1                              
   1                         
   1                    
   1                   
   1                 
   1              
   1            
   1